Set ws = CreateObject("Wscript.Shell") 
ws.run "stop8001.bat",vbhide